home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Best of MacTutor - S…e Code for Volumes 1 to 5
/
The Best of MacTutor - Source Code for Volume 1-5 (Wayzata Technology)(6031)(1990).bin
/
Source Code
/
#39 (Dec 88)
/
SmoothSource
/
Smooth.R
< prev
next >
Wrap
Text File
|
1988-06-22
|
6KB
|
251 lines
* Resources for Smoother
* (Make sure blank lines don't have space characters in them!)
SmoothRes.Rel
APPLDEMO
TYPE DEMO = GNRL
,0
.P
v 1.0 by Raul Tabasso - Roma 22/6/88
TYPE FREF
,128
APPL 0
TYPE BNDL
,128
DEMO 0
ICN#
0 128
FREF
0 128
TYPE ICN# = GNRL ;; Appl Icon
,128
.H
0000 0000 0000 0000 0000 0000 0000 3FC0
0001 C030 0002 0008 0004 0004 0004 0002
0008 0002 0008 0002 0008 0182 0008 0204
0004 0208 0002 01F0 0001 0000 0000 8000
0000 6000 0000 1800 0000 0700 0000 00C0
0000 0030 0000 000C 0000 0004 0000 0002
0000 0002 0000 0002 0000 0002 0000 0004
0000 0004 0000 0008 0000 0030 1FFF FFC0
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF ;;Mask
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
* ----------------------------------------
* --- MENUS
TYPE MENU
,1 ;;Apple menu
\14 ;;Apple char
About Smoother…
(-
TYPE MENU
,2
File ;;File menu
New polygon/N
Page Setup…
(Print…
Laser pen scaling/\1B!C ;;submenu 67
Quit/Q
TYPE MENU
,3
Edit ;;Edit menu
Undo/Z
(-
Cut/X
Copy/C
Paste/V
TYPE MENU
,4
Options ;;Polygon menu
(Smooth/S
Pen size/\1B!A ;;submenu 65
Fill tone/\1B!B ;;and 66
TYPE MENU
,65
Psize ;; Pen Size submenu
1 Pt.^;
2 Pt.^<
3 Pt.^=
4 Pt.^>
5 Pt.^?
TYPE MENU
,66
Fpat ;; Fill Pattern submenu
No fill^1
25%^2
50%^3
75%^4
Black^5
TYPE MENU
,67
PScale ;; Pen Scaling submenu
72 dpi
150 dpi
300 dpi
600 dpi
1200 dpi
TYPE DLOG
,256 ;;ID
The about dialog
80 80 220 400 ;;Rect
Visible NoGoAway
1 ;;proc ID
0 ;;ref con
256 ;;DITL related
TYPE DITL
,256
2
Button
100 200 120 256
OK
StaticText
32 64 80 256
Smoother by Raul Tabasso. ++
An example program on polygon's comments
* ----------------------------------------
* --- Icons for submenu n° 66 ------------
TYPE ICON = GNRL
,257
.H
FFFF FFFF FFFF FFFF C000 0003 C000 0003
C000 0003 C000 0003 C000 0003 C000 0003
C000 0003 C000 0003 C000 0003 C082 3C03
C0C2 6603 C0E2 6603 C0F2 6603 C0BA 6603
C09E 6603 C08E 6603 C086 6603 C082 3C03
C000 0003 C000 0003 C000 0003 C000 0003
C000 0003 C000 0003 C000 0003 C000 0003
C000 0003 C000 0003 FFFF FFFF FFFF FFFF
TYPE ICON = GNRL
,258
.H
FFFF FFFF FFFF FFFF E222 2223 C000 0003
C888 888B C000 0003 E222 2223 C000 0003
C888 888B C000 0003 E222 2223 C000 0003
C888 888B C000 0003 E222 2223 C000 0003
C888 888B C000 0003 E222 2223 C000 0003
C888 888B C000 0003 E222 2223 C000 0003
C888 888B C000 0003 E222 2223 C000 0003
C888 888B C000 0003 FFFF FFFF FFFF FFFF
TYPE ICON = GNRL
,259
.H
FFFF FFFF FFFF FFFF EAAA AAAB D555 5557
EAAA AAAB D555 5557 EAAA AAAB D555 5557
EAAA AAAB D555 5557 EAAA AAAB D555 5557
EAAA AAAB D555 5557 EAAA AAAB D555 5557
EAAA AAAB D555 5557 EAAA AAAB D555 5557
EAAA AAAB D555 5557 EAAA AAAB D555 5557
EAAA AAAB D555 5557 EAAA AAAB D555 5557
EAAA AAAB D555 5557 FFFF FFFF FFFF FFFF
TYPE ICON = GNRL
,260
.H
FFFF FFFF FFFF FFFF DDDD DDDF F777 7777
DDDD DDDF F777 7777 DDDD DDDF F777 7777
DDDD DDDF F777 7777 DDDD DDDF F777 7777
DDDD DDDF F777 7777 DDDD DDDF F777 7777
DDDD DDDF F777 7777 DDDD DDDF F777 7777
DDDD DDDF F777 7777 DDDD DDDF F777 7777
DDDD DDDF F777 7777 DDDD DDDF F777 7777
DDDD DDDF F777 7777 FFFF FFFF FFFF FFFF
TYPE ICON = GNRL
,261
.H
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF
* ----------------------------------------
* --- Icons for submenu n° 65 ------------
TYPE ICON = GNRL
,267
.H
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 FFFF FFFC
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
TYPE ICON = GNRL
,268
.H
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 FFFF FFFC FFFF FFFC
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
TYPE ICON = GNRL
,269
.H
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 FFFF FFFC FFFF FFFC FFFF FFFC
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
TYPE ICON = GNRL
,270
.H
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
FFFF FFFC FFFF FFFC FFFF FFFC FFFF FFFC
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
TYPE ICON = GNRL
,271
.H
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 FFFF FFFC
FFFF FFFC FFFF FFFC FFFF FFFC FFFF FFFC
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000
0000 0000 0000 0000 0000 0000 0000 0000